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1. Introduction 



1.1. TWO NOTIONS OF MONOTONICITY 



We will discuss two notions of monotonicity for probability measures 
on a finite partially ordered set (poset). Let S be a finite poset and let 
(P\,P2) be a pair of probability measures on S. (We use a calligraphic 
letter S in order to distinguish the set S from the same set equipped 
with a partial ordering <.) A subset U of S is said to be an up-set in 
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S (or increasing set) if y £ £/ whenever x £ U and x < y. We say that 
Pi is stochastically smaller than P2, denoted Pi ^ P2, if 

Pl(£7) < P2(^) for every up-set £/ in 5. (1.1) 

An important characterization of stochastic ordering was established 
by Strassen (1965) and fully investigated by Kamae et al. (1977). 
They show that ( |1.1| ) is necessary and sufficient for the existence of 
a pair (Xi,X2) of S- valued random variables [defined on some proba- 
bility space (Q, P)] satisfying the properties that Xi < X2 and that 
F(X t e ■) = Pi(-) fori = 1,2. 

Now let A be a finite poset. Let (P Q : a € A) be a system of probability 
measures on S. We call (P a : a E A) a realizably monotone system if 
there exists a system (X a : a 6 ^4) of S'-valued random variables such 
that 

X a < X^ whenever a < (3 (1-2) 

and 

P(X Q G •) = Ja(0 for every a £ A. (1.3) 

In such a case we shall say that (X Q : a E realizes the monotonicity 
of (P a : a € A). The (easier half of the) characterization of stochastic 
ordering applied pairwise implies 

Pq ^ P/3 whenever a < (3. (1-4) 

The system (P a : a S A) is said to be stochastically monotone if it 
satisfies ( |1,4| ). Thus, stochastic monotonicity is necessary for realizable 
monotonicity. 

In light of Strassen's characterization of stochastic ordering, one might 
guess that stochastic monotonicity is also sufficient for realizable mono- 
tonicity. It is perhaps surprising that the conjecture is false in general. 
Various counterexamples are given by Fill and Machida (2000), includ- 
ing one independently discovered by Ross (1993). Given a pair (^4, S) of 
posets, if the two notions of monotonicity — stochastic and realizable — 
are equivalent, then we say that monotonicity equivalence holds for 
(A,S). 

1.2. Inverse probability transform 

Suppose that S is linearly ordered. Then, for a given probability mea- 
sure P on S, we can define its inverse probability transform P _1 by 



P (t) := min{x £ S : t < F(x)} , t£[0,l), (1.5) 
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where F(x) := P({z € S : z < x}) is the distribution function 
for P. Furthermore, let A be any poset, and let [P a : a £ A) be a 
stochastically monotone system of probability measures on S. Given a 
single uniform random variable U on [0, 1), we can construct a system 
(X a : a G A) of S- valued random variables via X a := P Q T 1 (U) which 
realizes the monotonicity. This proves that monotonicity equivalence 
always holds for (-4,5) when S is linearly ordered. 

In Section || we generalize the definition of inverse probability transform 
to a certain class of posets <S which are not necessarily linearly or- 
dered. We then extend the construction in the preceding paragraph and 



present Theorems 2.2 and 2.3, thereby establishing monotonicity equiv- 
alence under certain additional assumptions. A further extension of 
Theorem 2.3 is discussed briefly in Section H, which culminates in The- 



orem 3.1. We will not discuss the proofs of Theorems 2^ , 2.3, and |3.1| in 
the present brief paper, but rather refer the reader to Machida (1999) 
for (the highly technical) proofs and more extensive discussion. 



1.3. Importance in perfect sampling algorithms 



Of particular interest in our general study of realizable monotonicity 
is the case A = S. Here the system (P(x, •) : x G S) of probability 
measures can be considered as a Markov transition matrix P on the 
state space S. Propp and Wilson (1996) and Fill (1998) introduced 
algorithms to produce observations distributed perfectly according to 
the long-run distribution of a Markov chain. Both algorithms apply 
most readily and operate most efficiently when the state space S is 
a poset and a suitable monotonicity condition holds. Of the many 
differences between the two algorithms, one is that the appropriate 
notion of monotonicity for the Propp- Wilson algorithm is realizable 
monotonicity, while for Fill's algorithm it is stochastic monotonicity; 
see Remark 4.5 in Fill (1998). Here the properties ( |1.2| )-(1.3) are essen- 
tial for the Propp- Wilson algorithm to be able to generate transitions 
simultaneously from every state in such a way as to preserve ordering 
relations. For further discussion of these perfect sampling algorithms in 
the monotone setting, see Fill (1998) and Propp and Wilson (1996); for 
further discussion of perfect sampling in general, consult the annotated 
bibliography at http : / / www . dbwilson . com/ exact/ . Fill and Machida 
(2000) show that the two notions of monotonicity are equivalent if and 
only if the poset S is acyclic; see Section 2A herein for the definition 
of this term. 
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2. A generalization of inverse probability transform 

2.1. Distribution functions on an acyclic poset 

We begin with a notion of acyclic poset, and its use in introducing a 
distribution function on such a poset. Most of the basic poset termi- 
nology adopted here can be found in Stanley (1986) or Trotter (1992), 
and most of the graph-theoretic terminology in West (1996). Let S be 
a poset. For x,y £ S, we say that y covers x if x < y in S and no 
element z of S satisfies x < z < y. We define the cover graph (S,£s) 
of S to be the undirected graph with edge set £s consisting of those 
unordered pairs {x, y} such that either x covers y or y covers x in S. 
A poset S is said to be acyclic when its cover graph (S,£s) is acyclic 
in the usual graph-theoretic sense (i.e., the graph has no cycle). 

Throughout the sequel we assume that the cover graph (S, £$) is acyclic 
and also connected, that is, that the graph (S, £s) is a tree. Let r be 
a fixed leaf of (S, £$), that is, an element r in S such that there exists 
a unique edge {r, z} in £$ (for some z £ S). Then, declare x < T y 
for x, y £ S if the (necessarily existent and unique) path (r, . . . , x) in 
the graph from r to x contains the path (r, . . . , y) from r to y as a 
segment. This introduces a partial ordering < T on the ground set S 
[Bogart (1996)], which may be different from < for the original poset 
S. We call this new poset (S, < T ) a rooted tree (rooted at r). 

For each x € S, set 

C(x) := {z € S : x covers z in (S, < r )}- 

Then a linear extension (S, <^) of (5, < T ) can be obtained by choosing 
a linear ordering on C{x) for every x £ S. Explicitly, we define x <^ y 
if either (i) x < T y, or (ii) there exist some z € S and some w, w' € C(z) 
such that x < T w, y < T w' , and u> has been chosen to be smaller than 



w' in C(z). See Section 2^ for an example 



DEFINITION 2.1. For a given probability measure P on S, we define 
the distribution function F(-) of P by 

F(x) := P ({2 G S : z < T x}) for each x £ S, 

and the distribution function F\-~\ of linear extension by 

F\x~\ := P({z £ S : z <^ x}) for each x £ S. 

In particular, when (£*, £$) is a path from one end point r to the other 
end point, the rooted tree (5, < T ) is linearly ordered, and therefore 
F(-) = F\-l 
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2.2. Inverse probability transform 



For a given distribution function F\-~\ of linear extension on S, we 
define the inverse probability transform P^ 1 , a map from [0,1) to S, 
by 

P^(t) : = min{x G S : t < F\x\ } for t G [0, 1), (2.6) 

where the minimum is given in terms of the linearly ordered set (S, <w>). 
When iS is linearly ordered, the two definitions of inverse probability 



transform in ( [Lq ) and (2.6) are the same. This equivalence can be 
extended to the case that the cover graph (S, Es) is a path, because 
of the fact that then F(-) = F\-~\. Moreover, the property of inverse 
probability transform discussed in Section IO remains true in that case: 



THEOREM 2.2. Let U be a uniform random variable on [0,1). Sup- 
pose that (S, Eg) is a path. Then, a stochastically monotone system 
(P a : a £ A) is always realizably monotone via X a := P Q T 1 (U). 



Theorem 2.2 reiterates a result presented by Fill and Machida (2000), 
namely, Theorem 6.1 in their paper. An acyclic poset S is called a poset 
of Class Z if the cover graph (S,E$) is a path. Otherwise, the acyclic 
(connected) poset S has a multiple-element C{x) for some x G S. An 



example in Section |2.3| will demonstrate that Theorem |2.2| can fail when 
an acyclic poset <S is not in Class Z. Besides the result for Class Z, Fill 
and Machida gave a complete answer to the monotonicity equivalence 
problem [i.e., the question whether monotonicity equivalence holds for 
given (*4,<S)] when there exists some x G S such that (i) C{x) contains 
at least two elements, and (ii) x is neither minimal nor maximal in S, 
that is, when an acyclic poset S falls into either Class B or Class Y, in 
their terms. [In their investigation, a construction of random variables 
with the desired properties ( |1.2| )-( |L3[ ) was reduced to application of 
Strassen's characterization of stochastic ordering if monotonicity equiv- 
alence holds for (A, S) with S a poset either of Class B or of Class Y.] 
However, when S is a poset satisfying the property that x is either 
maximal or minimal in S whenever C(x) contains at least two elements, 
which they (and we) call a poset of Class W, we do not know a complete 
answer to the monotonicity equivalence problem. But for a poset S of 
Class W our generalization of inverse probability transform can, for 
some posets A, be used to establish monotonicity equivalence: 



THEOREM 2.3. Let U be a uniform random variable on [0,1). Sup- 
pose that S is a poset of Class W, and that A is a poset having a 
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minimum element and a maximum element. Then, given a stochasti- 
cally monotone system (P a : a G A), there exists a system (4> a : a G A) 

of U -invariant maps from [0, 1) to [0, 1) [i.e., <fi(U) = U/ such that 
realizes the monotonicity. 



We call the U-invariant maps 4> a in Theorem 2.3 synchronizing func- 



tions. Discussion about how we can practically construct the desired 
synchronizing functions can be found in Machida (1999). 

2.3. An example 



Consider the poset S of Class W with the following Hasse diagram: 




the downward arc from z to y, for example, indicates that z covers y 
in S. Then the rooted tree (S, < T ) rooted at r and the corresponding 
linear extension (5, <^) are given respectively by 



(S, < 7 



and (S, < % 



yd 



X 

w 
v 

z 

y 

X 



where we have chosen the linear ordering z < v in C(w) and the linear 
ordering x < y in C{z). Let Pi and P2 be the two probability measures 
on S in the following table: 



y 



w 



3/15 2/15 1/15 1/15 7/15 1/15 
1/15 1/15 6/15 3/15 2/15 2/15 



We can easily check that P\ -< P%. However, P 1 (i) <$ P 2 (t) does 
not hold for all t G [0, 1): For t G [j^, j^), x = P 1 _1 (t) is incomparable 
with y = P 2 _1 (t), and again for t G 5)1 " = P\ l {^) ls incomparable 
with z = P 2 _1 (*)- 

Figure || displays the synchronizing functions and 4>2, which are both 
U-invariant from [0, 1) to [0, 1). Then consider the map P^T 1 o cj) k from 
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Figure 2. The synchronized inverse probability transforms P 1 o cf>i and P 2 1 o <£ 2 

[0, 1) to S for k = 1 and k = 2, as in Figure ^. It is clear from Figure [| 
that PfViW) <5 P 2 -1 (^2(*)) for all t £ [0,1), as desired. 



3. More on the monotonicity problem 

3.1. SYNCHRONIZABLE POSETS 

Given a poset S of Class W, Theorem ^ implies that if A is a poset 
having a minimum element and a maximum element, then monotonicity 
equivalence holds for (A,S). This section introduces without detail 
a further extension of monotonicity equivalence to a synchronizable 
poset A (as defined below). 

Let -D_4 be the set of all the minimal elements in A. Then we define a 
graph (Da,Ij) on the vertex set Dj± by including {a, a'} as an edge in 
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X4 if a 7^ oi and there exists some (3 £ A such that a,a' < f3 in ^4. We 
define in analogous fashion a graph (L>^,2^) on the set D*^ of all the 
maximal elements in A. We call these graphs of interlacing relation. 
Let (D_a,Iq) be a spanning tree of (D_a,Ia)> that is, let (Z?_4,2o) be 
a tree with 2q C X4. We will say that (D^Zo) is a locally connected 
spanning tree of (.D^X^) if for every a € A, the subgraph of (D_a,Iq) 
induced by D^{a) := {(3 G D.4 : /3 < a in ^4} is connected. Finally, we 
call A a synchronizable poset if there exist respective locally connected 
spanning trees of (D_a,Ia) an d of (D^,T^). 

THEOREM 3.1. If S is a poset of Class W and A is a synchronizable 
poset, then monotonicity equivalence holds for (A, S) . 



Theorem 3J. [which is Theorem 6.2 in Machida (1999)] is the most gen- 
eral positive result we know for the monotonicity equivalence problem 
when S is a poset of Class W. 



3.2. Open problem 



Let 



S :-. 




which is a poset of Class W, and let 



A:- 




Then the poset A is not synchronizable. However, we can show that 
monotonicity equivalence holds for (A,S) [Machida (1999)]. 

Theorem |3.l| has shown that synchronizability of the poset A is suffi- 
cient for monotonicity equivalence when S is a poset of Class W. But 
the above example disproves the assertion that synchronizability is nec- 
essary for monotonicity equivalence. Furthermore, let A4(S) denote the 
class of all posets A of monotonicity equivalence for S. Then we can also 
demonstrate [cf. Example 6.33 in Machida (1999)] that M(S) is not the 
same for all posets S of Class W. Thus, the interesting question raised 
but not settled by the present paper is how to completely characterize 



9 



posets A of monotonicity equivalence given a poset S of Class W, that 
is, to determine M(S) exactly for each poset S of Class W. 
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1. Implementation 

l \ProvidesFile{klu9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \9setf ontsize\normalsize\@ixpt{ll}'/, 

4 \abovedisplayskip 8.5\p@ \9plus3\pS \9minus4\p@ 

5 \abovedisplayshortskip \z@ \9plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\p9 \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\0viiipt{9 . 5}°/, 

12 \abovedisplayskip 6\p@ \0plus2\pS \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p(S \(3plus\p9 \9miims2\p@ 

15 \def \(31isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \aminus\p@ 

17 \parsep 2\p3 \3plus\p® \aminus\pS 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \3setf ontsize\f ootnotesize\aviipt{8}'/ 

23 \abovedisplayskip 4\pa \aplus2\pa \aminus2\p3 

24 \abovedisplayshortskip \z3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \9minusl\p9 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \Sminus\pa 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\9setf ontsize\scriptsize\9vipt\9viipt} 

33 \newcommand\little{\Ssetf ontsize\little\@vpt\9vipt} 

34 \newcommand\tiny{\Ssetf ontsize\tiny\9vpt\9vipt} 

35 \newcommand\large{\9setf ontsize\large\@xpt\@xiipt} 

36 \newcommand\Large{\9setf ont size\Large\9xi ipt{ 14}} 

37 \newcommand\LARGE{\9setf ontsize\LARGE\9xivpt{18}} 

38 \newcommand\huge{\Ssetf ontsize\huge\9xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\9xxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\pS} 

43 \setlength\headheight{12\p9} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

l \ProvidesFile{klut9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \3setf ontsize\normalsize\@ixpt{10 . 5}% 

4 \abovedisplayskip 8.5\p@ \9plus3\p@ \@minus4\p@ 

5 \abovedisplayshortskip \z9 \0plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\pa \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\@viiipt{9}'/, 

12 \abovedisplayskip 6\p(S \@plus2\p@ \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p® \9plus\p9 \9miims2\p9 

15 \def \91isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \0minus\pS 

17 \parsep 2\p@ \(3plus\p<S \<Sminus\p(S 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \0setf ontsize\f ootnotesize\(Sviipt{8}'/ 

23 \abovedisplayskip 4\p@ \@plus2\p@ \9minus2\pS 

24 \abovedisplayshortskip \z(3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \Ominusl\pa 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \0minus\p0 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\(3setf ontsize\scriptsize\9vipt\(3viipt} 

33 \newcommand\little{\@setf ontsize\little\Svpt\9vipt} 

34 \newcommand\tiny{\(Ssetf ontsize\tiny\9vpt\avipt} 

35 \newcommand\large{\asetf ontsize\large\@xpt{ll .5}} 

36 \newcommand\Large{\asetf ont size\Large\@xi ipt{ 14}} 

37 \newcommand\LARGE{\asetf ontsize\LARGE\Sxivpt{18}} 

38 \newcommand\huge{\@setf ontsize\huge\8xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\pa} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klul0.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcommand\normalsize{°/, 



3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\Qlisti\01istI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setfontsize\small\@ixpt{ll}7, 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@mimis4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \<3minus2\p@ 

17 \parsep 2\p@ \@plus\p<3 \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/, 

22 \0setf ontsize\f ootnotesize\@viiipt{9 . 5} '/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@mimis2\p@ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@mimis\p@ 

28 \parsep 2\p@ \@plus\p@ \@mimis\p@ 

29 \itemsep \parsep}°/, 

30 \belowdisplayskip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt}- 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt> 

35 \newcommand\large{\@seti ontsize\large\@xiipt-[14}-} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt-[18}-} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}}- 
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1.2. Various values 

Note that \hoffset and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt}- 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 Yfi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 YL 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\@tempdima-[-\f ootskip} 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep}- 

93 \setlength\@tempdimb-[\@tempdima} 

94 \addtolength\(3tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }*/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 > 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\footinsH9\p© \@plus 4\p@ \@minus 2\p®}- 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-[\lef tmargini}-[2em]- 

113 \setlength-C\lef tmarginiiH2 . 2em> 
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114 \setlength-[\lef tmarginiiiHl . 87em}- 

115 \setlength-[\leitmarginiv}-{l . 7em}- 

116 \setlength{\lef tmarginvHlem} 

117 \setlength-[\leftmarginviHlem} 

118 \setlength-[\labelsepH.4em}- 

119 \setlength-[\labelwidth}-{\leftmargini} 

120 \addtolength-[\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\01istl{/. 

122 \leftmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{"/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{°/. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istivC'/ t 

143 \setlength-[\leitmargin}-{\lef tmarginiv}-'/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv}-'/, 

145 \addtolength{\labelwidthH-\labelsep}-} 

146 \def \<31istv{'/. 

147 \setlength-C\leftmarginH\lef tmarginv}-'/, 

148 \setlength-[\labelwidth]-{\lef tmarginv}'/, 

149 \addtolength{\labelwidthH-\labelsep}-} 

150 \def \(31istvi{y. 

151 \setlength-[\lei tmarginHMef tmarginvi}'/, 

152 \setlength-[\labelwidth}-{\leftmarginvi]-°/, 

153 \addtolength{\labelwidthH-\labelsep}-}- 

154 \let\<31isti\@listl 

155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

160 \setlength\dbltextfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \®plus lfil} 

162 \setlength\@fpsep{8\p@ \0plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus lfil} 

164 \setlength\@dblfptop{0\p@ \@plus lfil} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl0.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcommand\normalsize{°/, 



3 \@setf ontsize\normalsize\@xpt{ll . 5}°/, 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@mirms5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\Qlisti\01istI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setfontsize\small\@ixpt{10 . 5}°/, 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \<3minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \<3minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/, 

22 \@setfontsize\iootnotesize\@viiipt{9}% 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p(3 \@plus\p@ \@minus2\p@ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}°/, 

30 \belowdisplayskip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt}- 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt> 

35 \newcommand\large{\@seti ontsize\large\@xiipt-[l4}-} 

36 \newcommand\Large{\@setfontsize\Large\@xivpt-[l8}-} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}}- 
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1.2. Various values 

Note that \hoffset and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt}- 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 Yfi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 YL 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\@tempdima-[-\f ootskip} 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep}- 

93 \setlength\@tempdimb-[\@tempdima} 

94 \addtolength\(3tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }*/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 > 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\footinsH9\p© \@plus 4\p@ \@minus 2\p®}- 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-[\lef tmarginiH2em]- 

113 \setlength-[\lef tmarginiiH2 . 2em> 
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114 \setlength-[\lef tmarginiiiHl . 87em}- 

115 \setlength-[\lef tmarginivHl . 7em}- 

116 \setlength{\lef tmarginvHlem} 

117 \setlength-[\leftmarginviHlem} 

118 \setlength-[\labelsepH.4em}- 

119 \setlength-C\labelwidthH\lef tmargini} 

120 \addtolength-[\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\01istl{/. 

122 \leftmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{"/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{°/. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istivC'/ t 

143 \setlength-[\leitmargin}-{\lef tmarginiv}-'/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv}-'/, 

145 \addtolength{\labelwidthH-\labelsep}-} 

146 \def \<31istv{'/. 

147 \setlength-C\leftmarginH\lef tmarginv}-'/, 

148 \setlength-[\labelwidth]-{\lef tmarginv}'/, 

149 \addtolength{\labelwidthH-\labelsep}-} 

150 \def \(31istvi{y. 

151 \setlength-[\lei tmarginHMef tmarginvi}'/, 

152 \setlength-[\labelwidth}-{\leftmarginvi]-°/, 

153 \addtolength{\labelwidthH-\labelsep}-}- 

154 \let\<31isti\@listl 

155 \(31isti 



1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\floatsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep-[12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep-[12\p@ \@plus 2\p(3 \Qminus 2\p@} 

160 \setlength\dbltextf loatsep{20\p@ \®plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\<3fptop{0\p@ \®plus lfil} 

162 \setlength\@fpsep{8\p<3 \0plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus lfil} 

164 \setlength\@dblfptop-[0\p@ \Splus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 

2 \renewcommand\normalsize{°/ 



3 \@setf ontsize\normalsize\@xipt{12 . 5}°/ 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z<3 \Qplus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\<aiisti\<aiistl} 
9 \normalsize 

10 \newcommand\small{7, 

11 \@setf ontsize\small\@xpt{ll . 5}7„ 

12 \abovedisplayskip 9\p@ \0plus3\p@ \0minus4\p@ 

13 \abovedisplayshortskip \z@ \0plus2\p<3 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p@ \@minus2\p@ 

17 \parsep 2\pQ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@ixpt{10 . 5}7, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \0minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def \(§listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \<§minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep Xparsep} /, 

30 \belowdisplayskip \abovedisplayskip 
31} 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5» 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}> 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin> 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
ETgX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 
Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7o 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc} , /. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 n 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-Q{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 >7„ 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 >7. 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\p@ \<§minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p<§} 

112 \setlength{\lef tmargini}{2em)- 
113 \setlength{\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiiiMl . 87em} 

115 \setlength{\lef tmargini v}{1 . 7em} 

116 \setlength{\lef tmarginvMlem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{ .4em> 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ > 

127 \def \®listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \®plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{7„ 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \®plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{°/„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \@listv{°/„ 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidthM\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{°/„ 

151 \setlength{\lef tmargin}{\lef tmarginvi} / 

152 \setlength.{\labelwidth}{\lef tmarginvi} /. 

153 \addtolength{\labelwidth}{-\labelsep}> 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p(§ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p<3 \@plus 2\p@ \Qminus 2\p(S> 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \<§plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p<3 \@plus If ill 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If ill 

164 \setlength\@dblf ptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\pQ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2. clo> [\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcommand\normalsize{% 

3 \@setf ontsize\normalsize\@xiipt{13 . 5}% 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip l\p@ \@plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl> 
9 \normalsize 

10 \newcommand\small-[°/o 

11 \@setf ontsize\small\@xipt{12 . 5}% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\leftmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@xpt{ll . 5}% 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def \@listi{\lef tmargin\leftmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 
31} 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viiipt{9}} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 
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35 \newcommand\large-[\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf ontsize\Large\@xviipt{22}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xxpt{25}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcommand\Huge-[\@setf ontsize\Huge\@xxvpt{30» 

1.2. Various values 

Note that \hoff set and \voffset are both compensated. This makes the calcula- 
tions below easier. 

40 \setlength\hoff set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 
43 \setlength\headheight{12\p@> 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 
47 \setlength\marginparsep{10pt} 
48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{12pt} 

52 \setlength\columnseprule{Opt} 
53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
F/IgX calculates textwidth out of \paperwidth. We did want to support letter paper, 
but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/ 

57 \setlength\@tempdima{\paperwidth}°/o 

58 \addtolength\@tempdima{-\textwidth} / 
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59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/„ 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }% 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. This 
does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 
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99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginviMlem} 

118 \setlength{\labelsep>{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth>{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \@listl{% 

122 \leftmargin \leftmargini 

123 \topsep ll\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 6\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p@ \@minus l\p@ > 

127 \def \@listii{°/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 3\p@ \@plus l\p@ \@minus l\p@ 
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133 \itemsep \parsep} 

134 \def \@listiii{% 

135 \lef tmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{°/„ 

143 \setlength{\lef tmargin}{\leftmarginiv}°/ 

144 \setlength{\labelwidth}{\leftmarginiv}°/ 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \<§listv{ /. 

147 \setlength{\lef tmargin}{\leftmarginv}°/ 

148 \setlength{\labelwidth}{\leftmarginv}°/ 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \@listvi{°/„ 

151 \setlength{\lef tmargin}{\leftmarginvi}°/ 

152 \setlength{\labelwidth}{\leftmarginvi}°/ 

153 \addtolength{\labelwidth}{-\labelsep» 
154 \let\@listi\@listl 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p©} 

160 \setlength\dbltextf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{10\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il> 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 



